home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 60.zip / BS1 part 60 / Kick Pascal v2.10 d1.adf / INCLUDE / MathIeeeDoubTrans.lib < prev    next >
Text File  |  2018-01-27  |  893b  |  24 lines
  1. {$if not def MATHIEEEDOUBTRANS_LIB}
  2. Const MATHIEEEDOUBTRANS_LIB="?";
  3. Var MathIeeeDoubTransBase:Ptr;
  4. Library MathIeeeDoubTransBase:
  5. -30:Function IEEEDPAtan(d0:Double):Double;
  6. -36:Function IEEEDPSin(d0:Double):Double;
  7. -42:Function IEEEDPCos(d0:Double):Double;
  8. -48:Function IEEEDPTan(d0:Double):Double;
  9. -54:Function IEEEDPSinCos(Var a0:Double; d0:Double):Double;
  10. -60:Function IEEEDPSinh(d0:Double):Double;
  11. -66:Function IEEEDPCosh(d0:Double):Double;
  12. -72:Function IEEEDPTanh(d0:Double):Double;
  13. -78:Function IEEEDPExp(d0:Double):Double;
  14. -84:Function IEEEDPLog(d0:Double):Double;
  15. -90:Function IEEEDPPow(d0,d2:Double):Double;
  16. -96:Function IEEEDPSqrt(d0:Double):Double;
  17. -102:Function IEEEDPTieee(d0:Double):Real;
  18. -108:Function IEEEDPFIEE(d0:Real):Double;
  19. -114:Function IEEEDPASin(d0:Double):Double;
  20. -120:Function IEEEDPAcos(d0:Double):Double;
  21. -126:Function IEEEDPLog10(d0:Double):Double;
  22. End;
  23. {$endif}
  24.